home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / four rings < prev    next >
Text File  |  1999-06-15  |  799b  |  25 lines
  1. Category: Filter Factory Gallery L
  2. Title: Four Rings...
  3. Author: Mario Klingemann
  4. Copyright: Copyright ©1996 Visual Manipulation
  5.  
  6. ctl[0]: Frequency 1
  7. ctl[1]: Frequency 2
  8. ctl[2]: Frequency 3
  9. ctl[3]: Frequency 4
  10. ctl[4]: Horizontal Shift
  11. ctl[5]: Vertical Shift
  12. ctl[6]:Input Line
  13. ctl[7]: Mode
  14. val[0]: 64
  15. val[1]: 64
  16. val[2]: 65
  17. val[3]: 67
  18. val[4]: 64
  19. val[5]: 32
  20. val[6]: 109
  21. val[7]: 95
  22. R:put(sin(c2m(x+val(4,-X,X),y+val(5,-Y,Y))*ctl(0))+sin(c2m(X-x+val(4,-X,X),y+val(5,-Y,Y))*ctl(1))-cos(c2m(x+val(4,-X,X),Y-y+val(5,-Y,Y))*ctl(2))+sin(c2m(X-x+val(4,-X,X),Y-y+val(5,-Y,Y))*ctl(3)),0),ctl(7)<128?src(scl(get(0),-1024,1024,0,X),val(6,0,Y),z):(get(0)+1024)/6
  23. G:ctl(7)<128?src(scl(get(0),-1024,1024,0,X),val(6,0,Y),z):(get(0)+1024)/6
  24. B:ctl(7)<128?src(scl(get(0),-1024,1024,0,X),val(6,0,Y),z):(get(0)+1024)/6
  25. A:255